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On March 19, 1986, Bytamastar 
Cofflputar Sarvicaa purchasad all rights 
to 7fta Smart Programmer -from Millara 
Graphics. Beginning in April, a new 
and timely quality publication under 
the name The Smart Programmer will be 
released to subscribers o-f both Super 
99 Monthly and The Smart Programmer ^ 
as well as through magazine stands. 

Sta-f -f wr i ter s -F rem both 
publications will continue as 
contributors, with Richard Mitchell 
serving as Editor. As most o-f you 
know. The Smart Programmer has been a 
prominent -fixture in the 99/4A 
community under the competent pen of 
Craig Miller. Craig's role with The 
Smart Programmer will be as a 
Corresponding Staff Writer. Many of 
the features of The Smart Programmer 
initiated by Millers Graphics will 
continue, including more memory maps 
and a 16-'page format. The only major 
departure from the format and plans of 
Millers Graphics is that four 16-page 
issues will replace the proposed 
"final" 64-page issue and The Smart 
Programmer will be an on-going 
project. Improved, regular services 
will be featured in the new 
publication. 

We arm also pleased to announce 
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that talented programmer D.C. Warren 
will be a Corresponding Staff Writer 
for The Smart Programmer. D.C. wrote 
Millers Graphics' EXPLORER program and 
has played an important role in 
several MG hardware and software 
projects, including Gram Kracker^'". 

As it 
Super 99 
Programmer 
the major 
last month 
Los Angel I 
affiliation of Craig Miller and D.C. 
Warren as Corresponding Staff Writers. 

Rates for new subscriptions and 
renewals to The Smart Programm 
shown on page 12 of this issue. 



Mclted about 
banner , it 

St of joy to 
The support 
been great. 



turns out, the merger of 
Monthly and The Smart 
is an expanded version of 
announcertient we promi sed 
for 99' Fest West '86 (in 
s) p where we announced the 



While we arm very 
the future under our new 
has brought us the great 
produce Super 99 Monthly m 
of you, our readers, h 
Thank you all very much! 



We'll be looking forward to being 
back with you in the pages of The 
Smart Programmer* 



SMOUI IMEUIS 



99' 




99 



Fest West 
Shrine Auditorium 
March 1 and 2, was 
Show organizers 
attendance to be 



the 
The 
L.A. 99'ers Computer Group, hosts of 



'B6, held at 
in Los Angela 
a great succ 
estimated 

nearly 2000. 



th 



on 
I 



the Fest, showed all of the 
hospitality for which th 
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warmth 
! group 



and 
has 
-> 



long been -famous. We especially want 
to thank Terrie Masters, George 
Ste-Ffen, Tom Freeman and Rick McDonald 
-for going out o-f the way to aid us 
directly. We commend L.A. 99*ers -for 
seeing that every individual attending 
and participating in Fest West was 
o-f-fered an enjoyable weekend. And, as 
one might expect, the weather and 
scenery in Southern Cali-fornia were 
incomparable. 



at Fest West -for «5S to «79. 



Many new and pending products 
» announced at the show, many o-f 
which were very exciting and welcomed 
additions -for the 99/4A community. 

Millers Graphics announced the 
l#.t"*=t -from their drawing board, an 
IBM J<eyboard Interface Card for the 
TI-99/4A FEB, a two-phased project. 
In Phase One, users will be able to 
hook up any IBM PC or IBM XT keyboard 
to the 99/4A (including the cableless 
models) , yielding separate cursor 
control keys, function keys and a 10 
key pad . The 99/4A consol e woul d 
remain hooked up as normal, but can be 
relocated to a poisltlnn that would get 

all of the cabling c :' of the way (the 
hi nt , dec! mal 15, wh 1 ch we ment i oned 
last month, was a reference to the IS 
pin connector on the 99/4A keyboard). 
All software will be 100% transparent 
and the product will work with all 
software, hardware and firmware 
currently on the market. A type ahead 
keystroke buffer is available from the 
IBM keyboards. The card is driven by 
a Z80 microprocessor. In phase two, 
the product will enable a smart 
programmable keyboard via 32K of 
additional plug in chips. Keystrokes 
wl 1 1 be completel y programmabl e, 
including use of macros and/or batch 
files. The programmed keystrokes will 
be available from Tl-Wrlter, Extended 
BASIC (CALL CLEAR could be a single 
keystroke, for instance) or any other 
software. The card will be in a case. 
The 32K memory will be battery backed 
up and the key definitions can be 
saved to and loaded from disk. The 
card Hill be priced at under «200 
(possibly far less) and the additional 
memory will be about 440. The card 
will be available in about 10 to 12 
ks. IBM keyboards were available 
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Millers Graphics demonstrated 
DisKassembler^'" (see our previous 
mention of this product in our 
November 198S issue). The program 
allows disassembling Dis/Fix 80 or 
Program Image files directly from disk 
or disassembling memory. It is by far 
the most powerful product of its type, 
even allowing viewing of both opcodes 
and text, with the capability of 
easily swapping out blocks of opcodes 
for text where appropriate. The 
program even builds labels, REF's, 
DEF's, a symbol table, EQUates and an 
END directive. It generates source 
code that is ready for re-assembly 
with very little, if any, editing. 
Priced at $19.95, DisKassembler ^ " will 
be available in about 4 weeks. The 
address for Millers Graphics is 1475 
W. Cypress Ave., Ban Dimas, 
CA 91773. 

MYARC's President, Lou Phillips, 
demonstrated their Extended BASIC II, 
which was recently released. The 
demonstration was quite impressive and 
included a routine si mi lar to the Mini 
Memory Lines program, drawing lines at 
various angles directly from Extended 
BASIC II. Phillips also showed the 
power of switching display parameters, 
changing the listing of a program 
several times — from the upper left 
hand corner of the screen only, from 
40 columns, from 28 columns — almost 
anything seemed possible. The cursor 
was completely mobile for editing any 
point in a program line and the speed 
of the 1 i stings was far faster than in 
TI Extended BASIC. According to 
Phi 1 1 Ips, Extended BASIC II Is 
desi gned to execute statements and 
commands at least as fast as TI 
Extended BASIC and in most cases about 
2 to 3 times as fast (up to 10 times 
as fast). Phillips also explained the 
advantages of Extended BASIC I I ' s 
expanded memory segments for most 
functions (similar to his Chicago 
talk) . User subprograms, DEF's, 
passing variables to Assembly and 
i n teger ar 1 thmet i c are not yet 
aval 1 ab 1 e ( the 1 ac k of i nteger 
arithmetic substantially slows 
Extended BASIC II), but will be 
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implanwiiteid as -frev upgrades. 
Extandac^ BASIC II requires the MYARC 
MEXP-1 t,,imQry card and an EPROM 
upgrade for the MEXP-1 <no charge -for 
the EPROM). Extended BASIC II carries 
a suggested price o-f «84.9S, with the 
combined package o-f the MEXP-1 card 
and XB II being available at a special 
package price. 

Phillips then covered the latest 

on the MYARC computer project. The 

most substantial change in plans since 
the November Chicago show was a 

decision to expand video memory -from 

64K to 128K (192K is still a 

possibility) . Additional information 

on MYARC s proposed peripheral 

interface cable was also released — 

everything on the 99/4A except the TI 

cable and console I/O port was 

designed to support at least 3 more 

lines than TI implemented, so that by 

introducing a new expansion cable on 

the new computer, addressing S12K and 

possibly other features will be 

possible. Phillips explained that 

Extended BASIC IZ has taken longer 

than anticipated to release, thereby 

delaying work on the computer project, 

but the only product remaining in the 

works is the computer, allowing MYARC 

to devote f ul 1 attention to the 

computer. Phillips stated that MYARC 

hopes to formal ly introduce the 

computer at the Summer Consumer 

Electronics Show, with availability to 

consumers coming sometime after the 

June show. MYARC's address is P.O. 

Box, 140, Basking Ridge, NJ 07920. 



The always popular Barry Traver 
maintained quite a crowd around his 
firm's booth, where he offered 
subscriptions to the Benial TRfiUelBR 
diskazine- Subscriptions for the 
excellent diskazine are *30 for six 
issues from Genial Computerware, 835 
Sreen Valley Drive, Philadelphia, 
PA 19128. 



will be made available in the near 
future), priced at »12.00. Also shown 
was Super 99 Handicapperp the most 
user-friendly and complete 
thoroughbred horse race handicapping 
aid available for the 99/4A. Super 
99 Handlcapper is available for 
♦15.00 from Bytemaster Computer 
Services, 171 Mustang Street, Sulphurg 
LA 70663 . 



John 



Keown demonstrated hi. 
mul t 1 -1 evel menu program 

The menu's 



i fflpressi ve mul 1 1 -1 evel menu program 
called Program Manager. The menu's 
can be stacked up to four deep to load 
and run thousands of assembly language 
programs almost instantly. The menu's 
Arm stored to disk for quick access. 
The program is being distributed by 
Pilgrim's Pride, 5 Williams Lane, 
Hatboro, PA 19040. 



Bytemaster Computer Services, 
publishers of Super 99 Month! y, 
unveiled two new disk offerings. The 
first, The Best of Super 99 Monthly, 
Vol, 1, is a two-disk package that 
includes nearly all of the non-FORTH 
programs published (the FORTH programs 
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John Keown also showcNl GPL 
Interpreter, a program that is said to 
be destined for inclusion in the MYARC 
computer. The program stores GPL code 
to disk for later loading into RAM, 
from which the GPL code is interpreted 
by the program. Keown showed an 
impressive demonstration of the TI 
Chess module implemented through his 
program. No mention was made of how 
one mi ght i mp 1 ement RAM-dependent 
modules, such as T I -Writer. Both GPL 
Interpreter and Program Manager 
require a MYARC MEXP-1 card or a 6000+ 
module (similar to a so-called Super 
Cartridge). Keown also indicated his 
programs would carry an intricate copy 
protection scheme. 

Ryte Data (Bruce Ryan), Canada, 
and T.A.P.E., Ltd. (Franz X. 
Wagenbach), U.S., ^ra distributors 

(each firm had a booth) of the German 
line of products from Mechatronichs 
GmbH. Mechatronics will be releasing 
several new products soon, with the 
two that seem to be generating the 
most i nterest being an 80-col umn 
upgrade (»200. 00) and an Eprommer 

(«129.50). Other products include a 
128K/312K GRAM-Karte (•249.95) , 
Expansion 128K Memory Card (•139.95), 
Stand Alone 128K Memory (•149.95) , 
Mouse (»9B.95), Extended BASIC II Plus 

(•79.95) and TI-99/4A Intern Book 

(•17.95). We'll be bringing you more 
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nawB about th»m« VKciting products In 

■for Ryte 

Street, 

KOM ISO. 

through 

Morgan Sc 

Court, 



the near future. The address 
Data is 210 Mountain 
Hal i burton, Ontario, Canada 
T.A.P.E. can be contacted 
their dealer, Douglas J. 
Associates, 76S5 Cherintoya 
Font an a, CA 



Dijit Systems, 4345 Hortensia 
Street, San Diego, CA 92103, offered 
an RGB converter, enabling use of a 
true RGB (Red, Green, Blue) monitor 
Mith the 99/4A. The video images were 
strikingly sharp. Though RGB monitors 
are expensive, if you want outstanding 
video output from your 99/4A, this 
product is definitely for you. The 
price for the converter is «98. 

Texanents, a major New York 
nail-order firm, offered many 
products, reporting sales of Dave 
Rose's TI-Artist's Companion «1 (see 
our December 1983 article referencing 
this product) and TI-Artist Extras to 
be particularly brisk. Texaments, S3 
Center Street, Patchogue, NY 11772, 

a distributor for the 

products (dealer inquiries 

Additionally, Texaments 

a very papular BBS at (516) 



is also 
TI-Artist 
invited) . 
operates 

475-6463 . 



Kent Thomson showed his 
Real estate/Tax PI anni ng Package, a 



must for the 1st time home 
the Bophi St i cated real 
investor. The package 
programs for home purchase 
income property analysis, 
analyzer, tax estimator 



buyer or 

estate 

includes 

analysis, 

mortgage 



and tax 

database updates. We've heard some 
very posi t i ve comments about this 
powerful package, which is available 
for «22.9S plus ♦1.00 shipping 
(California residents add «1.49 tax) 
from R. Kent Thomson, 409 Elberon 
Ave., Suite 2, San Pedro, CA 90731. 



*7-00, Asgard also released Warren 
Agee's Recipe Writer, written in FORTH 
(with the loader being accomplished 
through Extended BASIC). The program 
is excellent for storing, maintaining 
and converting recipes (yes, even for 
large gatherings). Recipe Writer is 
«12.00. Asgard also released Quick 
Dialer, a dialing aid for 
telecommunications through smart 
modems (supported through Fast-Term 
or, by modification, through other 
programs) . Quick Dialer is *10.00 
from Asgard Software, POB 10306, 
Rockville, MD 20850. 

DataBi oTi cs made aval 1 abl e the 
1 atest ver si on of /4A Tal k , a 
telecommunications program that has 
received top reviews, DataBioTics 
also offered Todd Kaplan's new Disk 
Master program, which has been 
receiving excellent reviews. 
DataBioTics' address is P.O. Box 
1194, Palos Verdes Estates, CA 90274. 

The Source was on-line during the 
weekend wi th popul ar Sysop Bl ai ne 
Crandall staffing the booth. To find 
out more about 99/4A services on The 
Source, write P.O. Box B66153, Piano, 
TX 750B6. 

Also on-line with live reports 
from the show was CompuServe 
Information Services, represented by 
Jim Horn . CompuServe ' s address i s 
5000 Arlington Centre Blvd., Columbus, 
OH 



I 



Hoi mes 
Court, 
discount 
diskettes. 

Stewart 
Ave. , Glendor 
"Fingerprint" 
Printers- 



and Compi 
Jose, CA 
priced. 



^ny, 67 Rhodes 

95126 offered 

high-quality 



Company, 837 E. Alosta 

1, CA 91470, offered the 

option for 99/4A Impact 



Asgard Software introduced Artist 
Companion, an Asgard «support product 
for TI-Artist 2,0 (Inscebot). Artist 
Companion includes 7 pictures, 41 
"instances" (clipart), a font called 
"Peignot" and a picture and slide file 
combination for music. Artist 
Companion carries a retail price of 



Silver Wolf Software, P.O. Box 
, San Francisco, CA 94188 had a 
variety of products, including an I/O 
port extender cable for getting the 
TI "firehose" cable out of the way, 
a popular product. 



«& 



Data Systems, 



2301 
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Drlv», OMnard, CA 93033, a^imrm 
■vvvraZ mo-ftwarv product*. Including 
■ducatlon«l aoftwara (including 
Chamistry) , vof twar* for ganarating 
lamt Mill and taatarminta and aavaral 
othar o-f-faringa. 



N, 



182 



Bita 'N Chips, 933 
Btraat, Saattla, WA 98133, is a 

ratal lar that o-f f ara many qual i ty 
products -for tha 99/4A. CorComp , 
invltad to participata at Faat Waat, 
alactad to ba raprasantad by tha nica 
•folka -from Bits 'N Chips. 

Irish Input, 4026 Alabama Straat 
#5, San Diago, CA 92104 ia a ratailar 
carrying many -fina 99/4A products. 

Vandors participating, but unabla 
to attand, Includad Tigarcub Softwara, 
Computer Shopper, Tanan and 

ItlCfiOp^ndium, 

Thara wara also a numbar of usar 
groups participating, with two groups, 
San Farnando Valley and Pomona Vail ay, 
having thair own booths. 



Tha 
actlva. 
foil owing I 



Fai rwara booth was qui t 
Offarings includad th 



Waathar Foracastar, Gary Cox, 3174 
Malbourna Driva, Memphis, TN 36127 

PRBasB, William Warran, 2373 Ironton 
St. , Aurora, CO BOOlO 

Mahrwara, Stava Mehr, 633 Hollyburno, 
Thousand Oaks, CA 91360 

Banners, Bernard Pal kin, address not 
available at press time. Member of 



San Farnando Vail ay 
Usara Group. 



TI99 Computar 



Sprit* Buildar (2 disks) and 
Homa Budgat (disk), John Taylor, 
Estalina Driva, Floranca, AL 

Scraan Dump and (saparata disks) 
Naatlist, Danny Michaal, Routa 9, 
460, Floranca, AL 35630 



2170 

3S630 



BON 



Ramafflbar to sand disk, mallar, postaga 
and anything alsa that coats monay to 
racaiva tha above Fairwara. If you 
use tha program, than sand tha amount 
tha author auggaats — usually tlO. 



Tha distinction 
distant traveler 
Bagnarasi , who cama a 
Milan, Italy! Paolo 
ACE program, which 
Juna, 1984 isaua 
Programmer . Mora r 
ralaasad a Fairwara 
BA-Wrltar, which impl 
of improvananta to TI 



of baing tha most 
goas to Paolo 
11 tha way from 
is famous for his 
appoarad in tha 

of Tha Smart 
acantly, ha has 

program callad 
amanta a numbar 
-Writer- 



Moat of tha folka from 
out-of-town stayed at a motal only a 
half-block away from tha Shrlna. Tha 
proximity to tha show site made It 
easy for everyone to coordinata. 
Dozana of people got togathar for 
meals and some very Intarasting 
conversations and Important 

It was real 1 y qui ta 

see the 99/4A community 

for the event. 



discussions, 
impressive to 
draw together 



We certainly hope 
becomes an annual event and 
to be supported by 99/4A us 



Fest West 
continues 

^rs. 



OR-TM 



Bevond T he Basic String 



by Warren Agee 



STANDARDi lA 2EA 4B 5A 6B 7B 9B 



In 

and the 
store a 



the past, we have looked at th 
basic string array, and how it 
string, retrieve it, and print 



' basic string, how it sits in 
sits in memory. We've learned 
it. Where do we go from here? 



memory, 
how to 
Well. 
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you have bvan playing around on your own with strings* along with some o-f th« 
naw words I prassntsd (lik* ACCEPT). From now on, things ars gonna gst a bit 
mora advancsd, and tha knowledge gained (hope-fully!) -from the -first two 
tutorials is important. In this tutorial, I will be presenting some very useful 
and powerful string utilities that I have collected -from countless sources^ 
some of them I have written myself. 

Some terminology, first: a BASE STRING is a string to which you want to do 
some sort of manipulating. A SUBSTRING is a separate string from the base 
string. You usually use it as a reference. For eKample, if we were to delete 
the word FOX from the sentence THE QUICK BROWN FOX, the sentence would be tha . 

base string, and FOX would be the substring. Also note that the utilites / 

presented hare work only with single strings and NOT string arrays. These words <, 
are INS*, DEL*, and -MATCH. First of all, let's say we reserve memory for a j 

lOO-byte long string called TEST*. We also have another string called SUB*, 
here mrm the contents of these stringsi 



l221NiOIWI IIISI ITIIIMIEI IFiOlRI IDtliNtNiElRI 



I3IT1HIE1 



(You can use ACCEPT and type in the above if you want to follow along). 

Notice that the first string is NOT an array, merely a long string which 
happens to be a sentence. The 22 is the count byte. Unfortunately, we seem to 
have a word missing! What to do? At the end of this tutorial is a definition 
for INS*, which will insert a "substring" into a "base" string. The stack 
arguments correspond as followsi 

INSERT* ( adrl nl adr2 n2 adr3 > 

adrl — > address of base string 

nl — > length of base string 

adr2 — > address of substring 

n2 — > length of substring 

adr3 — > address of insertion point 

So, using the above strings, assume that the word "THE" (the word that is 
missing) is located at SUB*. (Remember that variable names just supply an 
«address«, which Is what we need for INSERT* to work). Now to insert THE into 
the sentence, do the following: 

TEST* COUNT ( adrl nl) 

SUB* COUNT ( adr2 n2) 

TEST* 9 + { point of Insertion - addr3) 

INSERT* 

Your string will now look like this: ^ 

t26iNI0!WI IIISI ITJHiEI iTlItMIE! tFIOiRI JDillNINIEtRI j 

Experiment with INS* until you become comfortable with it| use the 
previously defined ACCEPT to store a long string at one location, and a 
substring to insert at another location. Just remember that YOU have to supply 
the location, or address, of the Insertion point. 



-MATCH 
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Now HERE is an int 
returns a 1 if no string i 
-MATCH also leave the addr 
stack arguments) the addr 
substring and its length, 
the base string. This word 
one possibility using INS« 
the word FOR in the above 



ting word! -MATCH looks for a matching string and 
s found, and a zero (O) if it is found. Additionally, 
ess of the byte AFTER the match. It requires four 
s of the base string and its length, and the address 
MATCH tries to find an occurence of the substring in 
is useful in conjunction with INS* above. Hero is 
and -MATCH. Say you want to insert the word MY after 
ing (TEST*)- It might go something like thiai 



: 60 

PAD 3 ACCEPT 



THE 



(_) i 



TEST* COUNT 
PAD COUNT 
-MATCH 

IF 



(Word to search for) 

Note: anything that appears between underscores 
to be typed in as a response to ACCEPT- > 

(Addr & cnt of base string) 

(Addr & cnt of substring) 

(stack: adr3 flag) 

(l=«no match) 
DROP . " Not found! " 

(else found; adr3 is left on stack) 
CR . " ENTER NEW WORD: " 

PAD 10 ACCEPT _MY_ (Word to insert) 

TEST* COUNT (Addr & cnt of base string) 

PAD COUNT (Addr 8c cnt of substring) 

S ROLL (Bring up adr3 which was left by -MATCH| this is 

insertion point) 
INSERT* 

CR CR TEST* COUNT TYPE (Displays new string) 
ENDIF I t- 7 V 

Please note that ROLL does not exist in the standard TI FORTH dictionary 
and must be defined separately- That definition appears at the end of this 
article. 



th 



DEL* 

Finally, we come to DEL*, which, by no surprise, deletes 
works along the same lines as INS*; the stack arguments requi 
length of the base string and the substring. DEL* searches th 
looking for a match with the substring. It accomplishes this 
explained above. Once it finds a match, it deletes the string 
found, it clears the stack and exits, no harm donrf. If you pi 
a program, you may want to modify it a bit- With -MATCH, you 
a match is found. Perhaps you want to do the same with DEL*, 
easily leave a 1 on the stack if the string was found and del 
zero if no match was found- Examine the comments for the list 
demostrate how to do this. 



a substring. It 
re the address and 
e base string, 
by using -MATCH, 
. If no match is 
an to use DEL* in 
can test to see if 
You could very 
eted, or leave a 
ing of DEL* to 



Well, that's it folks! FORTH is a powerful language, but it lacks in son* 
, especially string handling. But the real power in FORTH lies in its 
extensibility- As demonstrated here, we now have a good number of basic string 
utilities which can now become part of our FORTH vocabulary of words. Does 
XBASIC have a built-in INSERT or DELETE function for strings? Sure, you can 
simulate it with SES*, but that is very clumsy and VERY slow. With a little bit 
of ingenuity, you can make FORTH run circles around most languages without 
sacrificing ease-of-use- Have fun!! 

DEFINITIONS OF NEW WORDS 



I ROLL DUP 1 - IF DROP ELSE DUP 1 DO SWAP R> R> ROT >R >R >R LOOP 1 
DO R> R> R> ROT ROT >R >R SWAP LOOP ENDIF ; 
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^■^■-■V a " x^-¥4 nViv4r4[I-ni ^K^>-"^^fc^H •^V r^L"-r >. ■ ■ ■ *, f^ ^ - 



( NOTEi tha •following ds-finitlons r«quir« th« word PICK which warn dafinvd in an 
•arlivr article in this umrimw,.} 



I INSERT* (adrl nl adr2 n2 adrS > 

DUP 6 PICK 6 PICK •«- 

i+ OVER - 

OVER 9 PICK + SWAP <CnOVE 

OVER 5 ROLL •«• S ROLL 

1- C! SWAP <ChOVE I 



I -HATCH (adrl nl adr2 n2 — adr3 flag) 
SWAP DUP OS 5 PICK 5 ROLL f 
DUP 1 SWAP 6 PICK - 1-4- 7 ROLL 
DO 

3 PICK I ca • 

IF 


6 PICK 1 
DO 

J I •*• ca 6 PICK I ■*■ ca 

- NOT 
IF 

DROP 1 LEAVE 
END IF 
LOOP 
IF ELSE 

DROP DROP I 4 PICK + 
LEAVE 
END IF 
END IF 
LOOP 
ROT DROP ROT DROP ROT DROP } 



I DEL* 



( adrl nl adr2 n2) 



4 PICK 4 PICK 

4 ROLL 4 PICK -MATCH 

IF 

DROP DROP DROP DROP 
< ) 



DUP 3 PICK - 

5 PICK 5 PICK + 

3 PICK - 1+ CMOVE 

- SWAP 1 - C! 

( 1 ) 

ENDIF g 



(NOT FOUND) 
(clear stack) 

(insert the O i-f you want to 1 
when not -found) 



eave a -flag i-f not 



(insert the 1 i-f you want to leave a -flag if match 
was -found) 
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News, Corrections, Updates, Editorials, Kudos 



and Come-what-may 



CORRECTIONS 



Last month V we 
omitted and a coupli 
disk. So, here arc 



really goo-Fed! All o-f the 
I of lines did not appear • 
the lines that need to be 



"9"'B -from the 
s they were on 
changed I 



FORTH ar ticl 
the original 



were 
FORTH 



SCREEN 90 

3 PADS 9 16 + O OVER 1- FILE TERMIN 
PABS e 48 + O OVER 1- FILE TERMOUT 

2 PAB-ADDR Q VSBW 1 PAB-ADDR S S + VSBW PAB-ADDR 9 ALTIN ' 
1 PAB-ADDR 9 4+ VSBW 

3 PAB-ADDR 9 VSBW 1 PAB-ADDR 9 5+ VSBW PAB-ADDR 9 ALTOUT ' 
1 PAB-ADDR 9 4+ VSBW 

» CONSOLE O ALTIN ! O ALTOUT ! CLSE CLSE i 



I 



CHAR3 



4 P 

8 

9 

11 

12 

13 I 
14 

SCREEN 91 
4 I ID# ." SCREEN " SCR 9 - 25 EMIT f 

11 I MARK T-BUFF 9 CURSE 9 + t i CHNG MARK C! i 

12 I BELL 7 EMIT | i CLR 12 EMIT j 

14 I NEWLINE DUP 64 MOD O- | i OLDHNE DUP 1+ 64 MOD O- i 
SCREEN 92 

2 I UP CURSE 9 64 - DUP 0< IF BELL DROP ELSE CURSE ! 31 EMIT 

JRSE 9 64 + DUP 1023 > IF BELL DROP ELSE 
! 10 EMIT ENDIF | 
I LEFT CURSE 9 DUP O- IF BELL DROP ELSE 1- OLDLINE IF 32 31 
I RIGHT CURSE 9 1+ DUP 1023 > IF BELL DROP ELSE NEWLINE IF 
I TAB BEGIN RIGHT MARK C9 32 - O- CURSE 9 1023 « OR UNTIL 
BEGIN RIGHT MARK C9 32 - CURSE 9 1023 - OR UNTIL | 

I STED CURSE 9 16 OVER 64 / DO 64 O DO DUP T-BUFF 9 + C9 EMIT 1+ 
SCREEN 93 

2 I ROW CURSE 9 64 / I i COL CURSE 9 64 MOD | 

DET O Zl ! CURSE 9 BEGIN DUP 1+ 64 MOD WHILE 1 Zl +! DUP DUP 

1+ T-BUFF 9 + C9 DUP EMIT SWAP T-BUFF 9 + C! 1+ REPEAT 32 SWAP 

T-BUFF 9 + C! 9 13 32 CHAR3 COL 1+ O DO 28 EMIT LOOP | 

1ST O Zl ! 32 Z2 ! CURSE 9 BEGIN DUP Z2 9 DUP EMIT SWAP T-BUFF 

9 + DUP C9 Z2 ! C! 1+ DUP 64 MOD WHILE 1 Zl +! REPEAT 

9 13 32 CHAR3 COL 1+ O DO 28 EMIT LOOP | 

CLR ID# TOP SIDE HOME BLOCK T-BUFF ! 



4 

5 

6 

a 

10 

11 

12 



13 



I 



3 

4 

5 

6 

7 

B 

9 I 

10 

11 I 

12 I 

13 I 

SCREEN 94 
2 
3 
4 
7 
9 
10 
11 
12 
13 
14 



START DUP SCR 

O CURSE ! STED ; 

NEXT SCR 9 1+ DUP DISK HI 9 

LAST SCR 9 1- DUP DISK^LO 9 



IF DUP START THEN DROP | 
IF DUP START THEN DROP i 



I 

E 
I 



RETURN CURSE 9 DUP 64 / 1+ 64 « SWAP - O DO RIGHT LOOP t 



ROWAD DUP 64 t T-BUFF 9 + i 



: BLANKROW 80 32 FILL ; 
MROW 32 O DO OVER 9 OVER ! 2+ SWAP 2+ SWAP LOOP DROP DROP i 
DELL ROW ROWAD BUFF MROW ROW CURSE 9 Zl ! BEGIN DUP 15 - WHILE 
9 64 / 64 * CURSE • ROW IF ROW DO 10 EMIT LOOP THEN STED Zl 
9 CURSE ! 28 COL 1+ POSITION 10 ROW 1+ POSITION | 
INSL 15 BEGIN DUP ROW - WHILE DUP ROWAD DUP 64 - SWAP MROW 1- 
REPEAT ROWAD BUFF SWAP MROW CURSE 9 DUP Zl ! HOME 64 / 64 « 
CURSE ! ROW IF ROW O DO 10 EMIT LOOP THEN STED Zl 9 CURSE ! 
28 COL 1+ POSITION 10 ROW 1+ POSITION i 
SCREEN 95 

10 DUP 31 SWAP < IF DUP EMIT DUP CHNG 1 CURSE +! CURSE 9 DUP 

11 1024 « IF HOME THEN NEWLINE IF 9 10 13 CHAR3 32 EMIT THEN 
13 I ED9 SCR 9 EDIT i 
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In 


our 


January 


iSKU 


l»-ft >ani* loo 


prograffl. 


Hmr 


program 1 





hast* to camp 1 et» th 

ba-fora Fast Wastp 

a ands with the Databasa 

mrm soma updates to the 



>70 CALL CLEAR i i CALL SCREEN 
(6)11 FOR J»0 TO 12 II CALL 
C0L0R(J,16,6)ii NEXT J 
>2070 IF X>1S THEN DISPLAY AT 
(21, 1)1 "ENTER SELECTION (#,N 
"NEXT, P-PREVIOUS,E«END) i "i 
"1" ELSE 2050 
>3900 DISPLAY AT ( 12, 1 ) ERASE A 
LLi"FILE 18 NOT A PROPERLY 
FORMATTED DATABASE FILE" 
II FOR J-1 TO 500 II NEXT J 
II F*(S)«"" 

>3910 ON ERROR 3920 i i CLOSE 
#2 

>3920 RETURN 110 

>4100 60SUB 4500 ii Y"0 ii RE 
TURN ^ 

>4420 Y-Y+S II L«(Y)«SEG«(A«, 
1,28)11 L«<Y+1)»SEG»<A*,29,2 
8)11 L«(Y+2)-SEG»(A«,57,28) 

>4600 H«l 

>4610 B*«SEB»<A«,H,2S)ii X«LE 

N(B«)ii IF X*0 THEN 4650 
>4620 IF POS(B«, " '•,1)«0 OR B 

*-RPT»(" ",X)THEN 4640 
>4630 IF 8E6*(B«,X,1)<>" " TH 

EN B*-SEG«(B«,l,X-l):i X=X-1 
I I H»H-1 I I SOTO 4620 
>4640 IF B«<>RPT»(" ",LEN(B«) 

)THEN Y-Y+1 II L»(Y)=B* ii I 

F Y-21 THEN GOSUB 4950 ii Y- 
O 

>4650 IF H+28<81 THEN H«H+28 

I I GOTO 4610 
>4660 RETURN 



Also, we have learned that some 
readers have incorrectly included 
carriage returns within the keyword 

i-f there is any 



text in t^e 

must also be 

putting only 

a line is 



keyword name area, there 

a line reference, so that 

a carriage return on 

invalid. Another common problem has 

arisen due to readers assuming that 

the Tab in TI-Writ»r 

while in -Fact it begins 

keyword entries to be 

posi t i on o-f f . Al so , 

word wrap o-f-f in Tl-Writer by pressing 

<CTRL> <0> to be able to put 4 

keywords on one line. 



begins at 1, 
at 0, causing 

one character 
you must turn 



We've also been asked how our 
reference to 2032 keywords was 
computed and whether that was possible 
on a SS/SD disk. The minimum number 



database 

one line 

keyword 

of text 



of lines for a file for our 
is 5, 4 for the keywords and 
of text- If one puts 16 
references to that one line 
and follows essentially the same 
procedure for the maximum number of 
files for a 99/4A disk, 127 files, 
then that totals to 2032 keywords. 
Because the files are Dls/Fix 80, the 
maximum number of records per sector 
is 3 and our minimum file has S 
records, which computes to 2 sectors- 
For each file, one must also add 1 
sector for the file descriptor record, 
totalling 3 sectors per file. 3 times 
127 plus 2 disk overhead sectors 
equals 383 sectors. Obviously, at 
least DS or DD is required to achieve 
the 2032 keywords on a single disk- 
As you can now see, the availability 
of 2032 keywords on one disk could be 
considered a case of "over-kill", but 
that i s the on! y way to have an 
adequate number of keywords, 16, per 
file- 
Finally, to make the process of 
building your keyword section easier, 
here is an Extended BASIC program that 
builds a template that can be merged 

using LoadFile, 
place it at the 
current file. You 
any unused keyword 
segments. You may want to use <CTRL> 
<K> to delete all text to the right of 
the cursor to the end of the line, 

>100 !*««»»««»«««»»«««««««««« 

« SUPER 99 DATABASE « 
« KEYWORD TEMPLATE t 
« BUILDER « 

««««t««*««»»«««««««««»« 

>110 ! COPYRIGHT 1986 

BYTEMASTER COMPUTER 

SERVICES 
ALL RIGHTS RESERVED 
DISPLAY AT (1,1) ERASE ALL 
I "SUPER 99 DATABASE KEYWORD 

TEMPLATE BUILDER" i "COP YRIG 
HI 1986": "BYTEMASTER COMPUTE 
R SERVICES" 

>130 DISPLAY AT (7, 1) : "PRESS ' 
0' FOR TEMPLATE"! " ' 1' 



into Tl-Writer by 
DSKl. TEMPLATE to 
beginning of your 
can then 



>120 
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TO END" 
>140 DISPLAY AT(12,l)i"FILENA 

ME I " 8 " OSK 1 - TEMPLATE " 
>150 ACCEPT AT (13,1) BEEP SIZE 

<-15):F* 
>160 OPEN #1:F* 
>170 FOR 1=1 TO 4 
>iaO PRINT #laRPT»(RPT»(" ",1 

4)S."005005",4) 
>190 NEXT I 
>200 CLOSE #1 



Tex 
Exchange 
o-f March 
1-800~TI 
product 
through 
Lubbock, 



Instruments is closing all 
Centers effective the month 
To exchange products, phone 
CARES -for instructions. All 
exchanges will be handled 
central exchange center in 
Texas. 



I WISH I HADi 



Wish ttS> As a subscriber to MCI Mail 
I -find it impossible to upload TI- 

and Microso-ft Multiplan*=* 

files to MCI. Are you or any 

readers aware of a program or 

that would rectify this 

Gerhard Finke, Agoura 



Writer 
created 
of your 
procedure 
situation? 



not adequate. Send 
Scott Darling, W. 
Spokane, WA 9920B. 



disks, 
3515 



etc. to 
Woodside, 



WARNING* 

We gave this warning long ago, 
but it seems the time may be right 
again. We have received many 
complaints about firms that operate as 
if they're a club. Our suggestion is 
that if you can't vote for officers 
and the expenditure of funds, then you 
are not dealing with a club and should 
proceed with caution! Ask before you 
join ! There are plenty of good 
1 eg 1 1 i mate user groups around to 
assist you. If you have tried to 
locate a user group and have been 
unable to do so, contact us and we'll 
let you know where the nearest group 
is. 



Hills, California. 



The Triton Spring Catalog lists 

color monitors for *99.9S and Smith- 
Corona dot-matrix printers for only 
♦99. 95. Prices do not include 
sh i ppi ng and hand ling. For more 
information, contact Triton, P.O. Box 
8123, San Francisco, CA 94128. 



Mr. Finke, we Ar9 not MCI 
subscr 1 ber s . Perhaps some of 
readers will have a suggestion. 



Mail 
our 



Bonnie Snyder, President of Front 
Range 99'erB User Group is seeking 
assistance for the school at which she 
teaches. Anyone having software for 
visually impaired or blind students, 
please send the programs to Ms. Snyder 
through Front Ranger 99'ers, P.O. Box 
, Colorado Springs, CO 



FAIRWARE 

Scott Darling 
program that h 
was running a 
sectors of 



is offering a 
wrote whll 
There's over 
one SS/SD disk 



BBS 

he 

400 

is 



Biloxi 99'ers is organizing Th 
MeeTIng, which will likely be th 



largest event for 
the Gulf coast, 
have been invited 
more information, 
at (601) 374-4409 
"The Keep" BBS at 



99'ers ever held on 
Several key speakers 
to participate. For 
contact Rich Davles 
(before 9 PM) or on 
(601) 392-8717. We 



will have more details next month. 



Next month, we'll have info from 
the New England Fayuh in Boston (April 
5) and the New Jersey T.I.C.O.F.F held 
March 15. There will also be shows 
coming up in Nashville (Music City 
99'ers) and Ottawa (Ottawa User 
Group). Attend a show in your area* 
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Ratas -for The Smart Programmer 

•f-fKtiv* M«rch 19, 19B6 
SUBSCRIPTIONS (PER YEAR) i 
U.S. AND POSSESSIONS 

FIRST CLASS «18.00 
THIRD CLASS «15.00 
CANADA 

FIRST CLASS «18.00 
OTHER COUNTRIES 

AIR MAIL 432.00 

SURFACE MAIL »20.00 
INDIVIDUAL COPIES iSUPBR 99 MONTHLY^ 
U.S. SUBSCRIBERS 

FIRST CLASS • 
THIRD CLASS « 
CANADA SUBSCRIBERS « 
OTHER « 

Ch»ck or Monvy Ordar in U.S. -funda, 
codad for procaaaing through tha 
U.S. Fadaral Raaarva Bank Syatam. 
No billinga or cradlt aalaa. 
(all iaauaa availabla at praaa tima) 



BYTEMASTER ORDER FORM 



NAME 



ADDRESS 



CITY 



STATE 



ZIP 



COUNTRY 



1.3S 
i.OO 

1.3S 

1.50 



For back iaauaa, apacify Mhichi 



READER FEEDBACKi (Attach commanta) 



\ 
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SUP£/i 99 NONTHLY ia publiahad monthly 
by Bytaaaatar Computar Sarvicaa, 171 
Muatang Straat, Sulphur, LA 70663. 
All corraapondanca racaivad will ba 
conaidarad unconditionally aaaignad 
•for publication and copyright and 
aubjact ta aditing and cominanta by 
tha aditora of SUP£R 99 MOHTHLY. 
Each contribution to thia iaaua and 
tha iaaua aa a whala Copyright 1986 
by Bytamaatar Computar Sarvicaa. All 
righta raaarvad. Copying dona for 
otnar than paraonal archival or 
intarnal rm-fmruncm uaa without tha 

Sarmiaaion of Bytamaatar Computar 
arvicaa ia prohibitad. Bytamaatar 
Computar Sarvicaa aaaumes no 
liability for arrora in articlaa. 
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STANDARD KEY 
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1 



I 



1 

2 
4 

5 
6 

7 
9 



Comput 
Modula 
Diak Driva 
Expanaion Box 
Diak 

Control lar 
Mamory Card 
Monitor 



A TI-99/4A 

EA Editor/Aaaamblar 

B TEAC S5-B 

A TI 

B CorComp 

B MYARC MEXP-1 

B TI 



Gram Krackar and DiaKaaaamblar are 
ragiatarad tradamarka of Millara 
GraphicB 

Multiplan ia a ragiatarad tradamark 
of Microsoft Corp. 
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